library
install.packages("ggridges")
also installing the dependency ‘plyr’
trying URL 'https://cran.rstudio.com/bin/macosx/contrib/4.0/plyr_1.8.6.tgz'
Content type 'application/x-gzip' length 1012642 bytes (988 KB)
==================================================
downloaded 988 KB
trying URL 'https://cran.rstudio.com/bin/macosx/contrib/4.0/ggridges_0.5.2.tgz'
Content type 'application/x-gzip' length 2308196 bytes (2.2 MB)
==================================================
downloaded 2.2 MB
The downloaded binary packages are in
/var/folders/7y/mk_mzkbx4dvbx96jx9g9tbqm0000gn/T//RtmpYltOzh/downloaded_packages
data import
data_raw <- read_tsv("input2/data.csv")
Parsed with column specification:
cols(
.default = col_double(),
country = col_character()
)
See spec(...) for full column specifications.
inspect
age
age 999999 was possible so omitting ppl with age > 100 (some typed like 1992…)


most participants answered 1=male or 2=female. 0=missing, 3=other.
df <- data %>% #19,719
filter(age < 100) %>%
filter(gender %in% c(1, 2)) %>% # 19,514
mutate(gender = recode(gender, 1 = "Male", 2 = "Female")) %>%
Error: unexpected '=' in:
" filter(gender %in% c(1, 2)) %>% # 19,514
mutate(gender = recode(gender, 1 ="
country

plot

agreeableness

stability

LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQoKIyBsaWJyYXJ5CgpgYGB7cn0KCmxpYnJhcnkodGlkeXZlcnNlKQpsaWJyYXJ5KGdncmlkZ2VzKQpsaWJyYXJ5KG1hZ3JpdHRyKQpgYGAKIyBkYXRhIGltcG9ydCAKCmBgYHtyfQpzZXR3ZCgiL1VzZXJzL21tL0dvb2dsZSBEcml2ZSAoeGVycm94Y29weUBnbWFpbC5jb20pL1tHMTEyXVBlbnRhZ29uL2JpZy1maXZlLXBlcnNvbmFsaXR5LXRlc3QiKQpkYXRhX3JhdyA8LSByZWFkX3RzdigiaW5wdXQyL2RhdGEuY3N2IikKClZpZXcoZGF0YV9yYXcpCmhlYWQoZGF0YV9yYXcpCm5lZ2F0aXZlIDwtIGZ1bmN0aW9uKHgpIC14Cm1pbnVzdGhyZWUgPC0gZnVuY3Rpb24oeCkgeC0zCmRhdGEgPC0gCiAgZGF0YV9yYXcgJT4lIAogIG11dGF0ZV9hdCh2YXJzKGBFMWA6YE8zYCksIG1pbnVzdGhyZWUpICU+JSAKICBtdXRhdGVfYXQodmFycyhgRTFgOmBPM2ApLCB+aWZlbHNlKC4gPT0gLTMsIE5BLCAuKSkgJT4lIAogIG11dGF0ZV9hdChjKCdFMicsICdFNCcsICdFNicsICdFNicsICdFOCcsICdOMicsICdONCcsICdBMScsICdBMycsICdBNScsICdBNycsICdDMicsICdDNCcsICdDNicsICdDOCcsICdPMicsICdPNCcsICdPNicpLCBuZWdhdGl2ZSkgJT4lICAjIGh0dHBzOi8vd3d3LmthZ2dsZS5jb20vcGV0YXJsdWtldGluYS9iaWctZml2ZS1wZXJzb25hbGl0eS10cmFpdHMKICByb3d3aXNlKCkgJT4lIAogIG11dGF0ZSgKICAgIEUgPSBzdW0oY19hY3Jvc3MoYEUxYDpgRTEwYCkpLAogICAgTiA9IHN1bShjX2Fjcm9zcyhgTjFgOmBOMTBgKSksCiAgICBBID0gc3VtKGNfYWNyb3NzKGBBMWA6YEExMGApKSwKICAgIEMgPSBzdW0oY19hY3Jvc3MoYEMxYDpgQzEwYCkpLAogICAgTyA9IHN1bShjX2Fjcm9zcyhgTzFgOmBPMTBgKSksCiAgICAgICAgICkgJT4lIAogIHNlbGVjdChyYWNlLCBhZ2UsIGdlbmRlciwgY291bnRyeSwgRSwgTiwgQSwgQywgTykKCmBgYAoKIyBpbnNwZWN0CgojIyBhZ2UKCmFnZSA5OTk5OTkgd2FzIHBvc3NpYmxlIHNvIG9taXR0aW5nIHBwbCB3aXRoIGFnZSA+IDEwMCAoc29tZSB0eXBlZCBsaWtlIDE5OTIuLi4pCgpgYGB7cn0KCmRhdGEgJT4lIAogIGZpbHRlcihhZ2UgPCAxMDApICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBhZ2UsIGdyb3VwID0gZ2VuZGVyLCBjb2xvciA9IGdlbmRlcikpICsKICBnZW9tX2RlbnNpdHkoKQpgYGAKCmBgYHtyfQpkYXRhICU+JSAKICBmaWx0ZXIoYWdlIDwgMTAwKSAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gZ2VuZGVyKSkgKyAKICBnZW9tX2hpc3RvZ3JhbSgpCgpgYGAKbW9zdCBwYXJ0aWNpcGFudHMgYW5zd2VyZWQgMT1tYWxlIG9yIDI9ZmVtYWxlLiAwPW1pc3NpbmcsIDM9b3RoZXIuCmBgYHtyfQpkZiA8LSBkYXRhICU+JSAgIzE5LDcxOQogIGZpbHRlcihhZ2UgPCAxMDApICU+JSAKICBmaWx0ZXIoZ2VuZGVyICVpbiUgYygxLCAyKSkgJT4lICAjIDE5LDUxNAogIG11dGF0ZShnZW5kZXIgPSByZWNvZGUoZ2VuZGVyLCBgMWAgPSAiTWFsZSIsIGAyYCA9ICJGZW1hbGUiKSkgJT4lIAogIHBpdm90X2xvbmdlcihjb2xzID0gYygiRSIsICJOIiwgIkEiLCAiQyIsICJPIiksIG5hbWVzX3RvPSJiaWdmaXZlIiwgdmFsdWVzX3RvPSJ2YWx1ZSIpIAoKYGBgCgojIyBjb3VudHJ5CgpgYGB7ciAgZmlnLndpZHRoPTEwLCBmaWcuaGVpZ2h0PTIwfQpkZiAlPiUgCiAgZ2dwbG90KGFlcyh4ID0gdmFsdWUsIHkgPSBjb3VudHJ5LCBncm91cCA9IGNvdW50cnksIGNvbG9yID0gY291bnRyeSkpICsKICAjIGdlb21fY291bnQoKSArCiAgZ2VvbV9kZW5zaXR5X3JpZGdlcygpIAogICMgZmFjZXRfZ3JpZChjb2xzID0gdmFycyhiaWdmaXZlKSkKYGBgCgoKIyBwbG90IAoKCgpgYGB7ciBmaWcud2lkdGg9NSwgZmlnLmhlaWdodD0yLjV9CmRmICU+JSAKICBmaWx0ZXIoYWdlIDwgODApICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBhZ2UsIHkgPSB2YWx1ZSkpICsKICBnZW9tX2NvdW50KGFlcyhmaWxsPSB2YWx1ZSkpICsKICBzY2FsZV9zaXplX2FyZWEoKSArCiAgICBzY2FsZV9maWxsX3ZpcmlkaXNfYyggKSArCgogIGdlb21fc21vb3RoKGFlcyhjb2xvciA9IGdlbmRlciksIGZpbGwgPSAiZ3JleTcwIikgKwogIGZhY2V0X2dyaWQoY29scyA9IHZhcnMoYmlnZml2ZSkpICsKICB0aGVtZV9saW5lZHJhdygpICsKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCgpnZ3NhdmUoIm91dHB1dC9wbG90L2FsbF9hZ2UtdmFsdWV+Z2VuZGVyLnBuZyIsIHdpZHRoPTE5LjIwLzMsIGhlaWdodD05LzMsIHVuaXQ9ImluIiwgZHBpPTMwMCkKCmBgYAojIyMgYWdyZWVhYmxlbmVzcwoKYGBge3J9CmRmICU+JSAKICBmaWx0ZXIoYWdlIDwgODApICU+JSAKICBmaWx0ZXIoYmlnZml2ZSA9PSAiQSIpICU+JSAKICBnZ3Bsb3QoYWVzKHggPSBhZ2UsIHkgPSB2YWx1ZSwgY29sb3IgPSB2YWx1ZSkpICsKICBzY2FsZV9jb2xvcl92aXJpZGlzX2MoICkgKwogIGdlb21fY291bnQoYWxwaGEgPSAwLjMpICsKICBzY2FsZV9zaXplX2FyZWEoKSArCiAgIyBnZW9tX2RlbnNpdHlfMmRfZmlsbGVkKGFscGhhID0gMC41KSArCiAgZ2VvbV9zbW9vdGgoY29sb3IgPSAiYmxhY2siLCBmaWxsID0gImdyZXk3MCIpICsKICBmYWNldF9ncmlkKGNvbHMgPSB2YXJzKGdlbmRlcikpICsKICB0aGVtZV9saW5lZHJhdygpICsKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCgpnZ3NhdmUoIm91dHB1dC9wbG90L0FfYWdlLXZhbHVlfmdlbmRlci5wbmciLCB3aWR0aD0xOS4yMC8zLCBoZWlnaHQ9OS8zLCB1bml0PSJpbiIsIGRwaT0zMDApCmBgYAoKCgojIyMgc3RhYmlsaXR5CgpgYGB7cn0KZGYgJT4lIAogIGZpbHRlcihhZ2UgPCA4MCkgJT4lIAogIGZpbHRlcihiaWdmaXZlID09ICJOIikgJT4lIAogIGdncGxvdChhZXMoeCA9IGFnZSwgeSA9IC12YWx1ZSwgY29sb3IgPSB2YWx1ZSkpICsKICBzY2FsZV9jb2xvcl92aXJpZGlzX2MoICkgKwogIGdlb21fY291bnQoYWxwaGEgPSAwLjMpICsKICBzY2FsZV9zaXplX2FyZWEoKSArCiAgIyBnZW9tX2RlbnNpdHlfMmRfZmlsbGVkKGFscGhhID0gMC41KSArCiAgZ2VvbV9zbW9vdGgoY29sb3IgPSAiYmxhY2siLCBmaWxsID0gImdyZXk3MCIpICsKICBmYWNldF9ncmlkKGNvbHMgPSB2YXJzKGdlbmRlcikpICsKICB0aGVtZV9saW5lZHJhdygpICsKICB0aGVtZShsZWdlbmQucG9zaXRpb24gPSAibm9uZSIpCgpnZ3NhdmUoIm91dHB1dC9wbG90L1NfYWdlLXZhbHVlfmdlbmRlci5wbmciLCB3aWR0aD0xOS4yMC8zLCBoZWlnaHQ9OS8zLCB1bml0PSJpbiIsIGRwaT0zMDApCmBgYAoK